object myDM: TmyDM
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Height = 318
  Width = 488
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\Project\tj\sum.m' +
      'db;Persist Security Info=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 208
    Top = 56
  end
  object AT_Company: TADOTable
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'company'
    Left = 104
    Top = 152
    object AT_Companyco_id: TAutoIncField
      DisplayLabel = #20844#21496#24207#21495
      DisplayWidth = 12
      FieldName = 'co_id'
      ReadOnly = True
    end
    object AT_Companycompany: TWideStringField
      DisplayLabel = #24448#26469#20844#21496#21517
      DisplayWidth = 47
      FieldName = 'company'
      Size = 255
    end
    object AT_Companyowner: TIntegerField
      DisplayLabel = #31649#29702#21333#20301
      DisplayWidth = 12
      FieldName = 'owner'
    end
  end
  object AT_type: TADOTable
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'type'
    Left = 224
    Top = 152
  end
  object DS_company: TDataSource
    DataSet = AT_Company
    Left = 96
    Top = 232
  end
  object DS_type: TDataSource
    DataSet = AT_type
    Left = 192
    Top = 224
  end
  object DS_dw: TDataSource
    DataSet = AQ_dw
    Left = 360
    Top = 240
  end
  object AT_tree: TADOTable
    Connection = ADOConnection1
    CursorType = ctStatic
    TableName = 'tree'
    Left = 432
    Top = 160
  end
  object DS_tree: TDataSource
    DataSet = AT_tree
    Left = 440
    Top = 232
  end
  object AQ_dw: TADOQuery
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select id,name,quickinput'
      'from tree'
      'where  parentid=0 and level=1')
    Left = 360
    Top = 160
    object AQ_dwid: TAutoIncField
      DisplayWidth = 12
      FieldName = 'id'
      ReadOnly = True
    end
    object AQ_dwname: TWideStringField
      DisplayLabel = #21333#20301#21517#31216
      DisplayWidth = 18
      FieldName = 'name'
      Size = 30
    end
    object AQ_dwquickinput: TWideStringField
      FieldName = 'quickinput'
      Size = 15
    end
  end
end
